home *** CD-ROM | disk | FTP | other *** search
- object DBExprBuilder: TDBExprBuilder
- Left = 47
- Top = 67
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- ClientHeight = 460
- ClientWidth = 703
- Font.Color = clBlack
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpVariable
- Font.Style = []
- PixelsPerInch = 120
- Position = poScreenCenter
- OnActivate = FormActivate
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- TextHeight = 16
- object Bevel1: TBevel
- Left = 561
- Top = 30
- Width = 129
- Height = 257
- Shape = bsFrame
- end
- object SpeedButton1: TSpeedButton
- Tag = 1
- Left = 571
- Top = 49
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '&='
- OnClick = SpeedButton1Click
- end
- object NeBtn: TSpeedButton
- Tag = 1
- Left = 610
- Top = 49
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '<>'
- OnClick = SpeedButton1Click
- end
- object LtBtn: TSpeedButton
- Left = 651
- Top = 49
- Width = 28
- Height = 31
- AllowAllUp = True
- Caption = '&<'
- OnClick = SpeedButton1Click
- end
- object SpeedButton4: TSpeedButton
- Left = 571
- Top = 89
- Width = 31
- Height = 30
- AllowAllUp = True
- Caption = '&>'
- OnClick = SpeedButton1Click
- end
- object LEBtn: TSpeedButton
- Left = 612
- Top = 89
- Width = 30
- Height = 30
- AllowAllUp = True
- Caption = '<='
- OnClick = SpeedButton1Click
- end
- object GeBtn: TSpeedButton
- Tag = 1
- Left = 650
- Top = 89
- Width = 31
- Height = 30
- AllowAllUp = True
- Caption = '>='
- OnClick = SpeedButton1Click
- end
- object PlusBtn: TSpeedButton
- Tag = 1
- Left = 571
- Top = 128
- Width = 31
- Height = 31
- Caption = '&+'
- OnClick = SpeedButton1Click
- end
- object MinusBtn: TSpeedButton
- Tag = 1
- Left = 610
- Top = 128
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '&-'
- OnClick = SpeedButton1Click
- end
- object SpeedButton9: TSpeedButton
- Left = 650
- Top = 128
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '&*'
- OnClick = SpeedButton1Click
- end
- object DivideBtn: TSpeedButton
- Tag = 1
- Left = 571
- Top = 167
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '&/'
- OnClick = SpeedButton1Click
- end
- object SpeedButton11: TSpeedButton
- Tag = 1
- Left = 610
- Top = 167
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '&^'
- OnClick = SpeedButton1Click
- end
- object QuoteBtn: TSpeedButton
- Tag = 1
- Left = 650
- Top = 167
- Width = 31
- Height = 31
- AllowAllUp = True
- Caption = '&"'
- OnClick = SpeedButton1Click
- end
- object AndBtn: TSpeedButton
- Tag = 1
- Left = 571
- Top = 207
- Width = 51
- Height = 31
- AllowAllUp = True
- Caption = 'And'
- OnClick = SpeedButton1Click
- end
- object OrBtn: TSpeedButton
- Tag = 1
- Left = 630
- Top = 207
- Width = 51
- Height = 31
- AllowAllUp = True
- Caption = 'Or'
- OnClick = SpeedButton1Click
- end
- object NotBtn: TSpeedButton
- Tag = 1
- Left = 571
- Top = 246
- Width = 51
- Height = 31
- AllowAllUp = True
- Caption = 'Not'
- OnClick = SpeedButton1Click
- end
- object SpeedButton16: TSpeedButton
- Tag = 1
- Left = 630
- Top = 246
- Width = 51
- Height = 31
- AllowAllUp = True
- Caption = 'Like'
- OnClick = SpeedButton1Click
- end
- object Bevel4: TBevel
- Left = 15
- Top = 30
- Width = 533
- Height = 99
- Shape = bsFrame
- end
- object Label1: TLabel
- Left = 17
- Top = 20
- Width = 83
- Height = 19
- Caption = '&Expression'
- end
- object Label4: TLabel
- Left = 566
- Top = 20
- Width = 65
- Height = 19
- Caption = 'Operators'
- end
- object ExpressionMemo: TMemo
- Left = 22
- Top = 39
- Width = 518
- Height = 80
- TabOrder = 0
- OnMouseUp = ExpressionMemoMouseUp
- end
- object BitBtn1: TBitBtn
- Left = 460
- Top = 236
- Width = 90
- Height = 31
- TabOrder = 1
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 460
- Top = 276
- Width = 90
- Height = 30
- TabOrder = 2
- Kind = bkCancel
- end
- object GroupButton: TBitBtn
- Left = 460
- Top = 158
- Width = 90
- Height = 30
- Caption = 'Group'
- TabOrder = 3
- OnClick = GroupButtonClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333000003333333333F777773FF333333003333300
- 33333337733333773F33330333333333033333733FFFFFFF73F3303300000003
- 303337F37777777337F3303330CCC0333033373337777733373F0333330C0333
- 33037F33337773FFF37F03333330300033037F3FFFF73777FF7F0300000307B7
- 03037F77777F77777F7F030999030BBB03037F77777F77777F7F0309990307B7
- 03037377777F7777737330099903300030333777777F377737F3300000033333
- 3033377777733333373333033333333303333373FF33333F7333333003333300
- 3333333773FFFF77333333333000003333333333377777333333}
- NumGlyphs = 2
- end
- object Calcbtn: TBitBtn
- Left = 460
- Top = 197
- Width = 90
- Height = 31
- Caption = 'Calc'
- TabOrder = 4
- OnClick = CalcbtnClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
- 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
- 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
- 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
- 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
- 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
- 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
- 0333337F777777737F333308888888880333337F333333337F33330888888888
- 03333373FFFFFFFF7333337000000000733333377777777733330000}
- NumGlyphs = 2
- end
- object StatusPanel: TPanel
- Left = 7
- Top = 423
- Width = 681
- Height = 31
- TabOrder = 5
- end
- object GroupBox1: TGroupBox
- Left = 7
- Top = 325
- Width = 681
- Height = 90
- Caption = 'Result'
- TabOrder = 6
- object Resultmemo: TMemo
- Left = 7
- Top = 18
- Width = 666
- Height = 62
- Lines.Strings = (
- '')
- TabOrder = 0
- end
- end
- object TableGroup: TGroupBox
- Left = 15
- Top = 138
- Width = 134
- Height = 178
- Caption = '&Tables'
- TabOrder = 7
- object TableListbox: TListBox
- Left = 10
- Top = 20
- Width = 117
- Height = 149
- ItemHeight = 16
- TabOrder = 0
- OnClick = TableListboxClick
- end
- end
- object FieldsGroup: TGroupBox
- Left = 155
- Top = 138
- Width = 142
- Height = 178
- Caption = '&Fields'
- TabOrder = 8
- object FieldListbox: TListBox
- Left = 10
- Top = 20
- Width = 123
- Height = 149
- ItemHeight = 16
- TabOrder = 0
- OnDblClick = FieldListboxDblClick
- end
- end
- object FunctionGroup: TGroupBox
- Left = 303
- Top = 138
- Width = 149
- Height = 178
- Caption = 'Functions'
- TabOrder = 9
- object FunctionListBox: TListBox
- Left = 12
- Top = 20
- Width = 126
- Height = 149
- ItemHeight = 16
- Sorted = True
- TabOrder = 0
- OnDblClick = FunctionListBoxDblClick
- end
- end
- end
-